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Figure 2 
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Call find Jarthest(p[0]) 
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Save result in p Jar 



Call find _farthest(p_far) 



Save result in pjar2 
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Let max_d = 0 
Let max_point = p 
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Return maxjpoint as point 



Let q = next point 
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Let d = distance between p 
and q 
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Figure 3 
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Q Test to see if side is straight 



Initialize w1, w2, w3, y 501 

w4, w5 to zero 




Get next point p 



Calculate d = distance 
between p and line segment 
through endpoints 
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^Return not straight 
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Figure 6 



C Determine whether figu re is closed) 
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Let tol = 
size / 1 1 
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Let tol = 2 



Let big = tol* 2 
Let trigger = tol * 3 
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Let state = 0 
Let i = 0 
Let last_near = 0 
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— » | Let tol = big ^- 
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Let i a i + 1 
Let last_near = near 



